PC Professionell 2006 May/PCpro_2006_05.ISO/files/mobile/fma-2.0-stable-setup.exe/{app}/source/uSyncPhonebook.dfm

Text File | 2004-07-01 | 8.0 KB | 321 lines

object frmSyncPhonebook: TfrmSyncPhonebook
  Left = 0
  Top = 0
  Width = 618
  Height = 363
  Font.Charset = RUSSIAN_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  ParentFont = False
  TabOrder = 0
  Visible = False
  DesignSize = (
    618
    363)
  object ListContacts: TVirtualStringTree
    Left = 0
    Top = 0
    Width = 618
    Height = 324
    Align = alClient
    DefaultNodeHeight = 17
    DragMode = dmAutomatic
    Header.AutoSizeIndex = -1
    Header.Font.Charset = ANSI_CHARSET
    Header.Font.Color = clWindowText
    Header.Font.Height = -11
    Header.Font.Name = 'Arial Unicode MS'
    Header.Font.Style = []
    Header.Height = 20
    Header.MainColumn = 1
    Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoHotTrack, hoShowImages, hoShowSortGlyphs, hoVisible]
    Header.PopupMenu = PopupMenu2
    Header.SortColumn = 1
    Header.Style = hsFlatButtons
    HintAnimation = hatNone
    HintMode = hmTooltip
    Images = Form1.ImageList4
    IncrementalSearch = isInitializedOnly
    IncrementalSearchTimeout = 500
    Indent = 0
    LineMode = lmBands
    PopupMenu = PopupMenu1
    ScrollBarOptions.AlwaysVisible = True
    TabOrder = 1
    TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoSpanColumns, toAutoTristateTracking, toAutoDeleteMovedNodes]
    TreeOptions.MiscOptions = [toAcceptOLEDrop, toFullRepaintOnResize, toInitOnSave, toReportMode, toToggleOnDblClick, toWheelPanning]
    TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages]
    TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect, toRightClickSelect]
    OnAfterPaint = ListContactsAfterPaint
    OnCompareNodes = ListContactsCompareNodes
    OnDblClick = btnEditClick
    OnGetText = ListContactsGetText
    OnGetImageIndex = ListContactsGetImageIndex
    OnHeaderClick = ListContactsHeaderClick
    OnHeaderMouseUp = ListContactsHeaderMouseUp
    OnIncrementalSearch = ListContactsIncrementalSearch
    OnKeyDown = ListContactsKeyDown
    Columns = <
      item
        MinWidth = 50
        Position = 0
        Width = 53
        WideText = 'Status'
      end
      item
        MinWidth = 70
        Position = 1
        Width = 140
        WideText = 'Full Name'
      end
      item
        MinWidth = 70
        Position = 2
        Width = 100
        WideText = 'Title'
      end
      item
        MinWidth = 70
        Position = 3
        Width = 120
        WideText = 'Organization'
      end
      item
        ImageIndex = 14
        MinWidth = 70
        Position = 4
        Width = 180
        WideText = 'Email'
      end
      item
        ImageIndex = 9
        MinWidth = 70
        Position = 5
        Width = 120
        WideText = 'Home'
      end
      item
        ImageIndex = 11
        MinWidth = 70
        Position = 6
        Width = 120
        WideText = 'Work'
      end
      item
        ImageIndex = 10
        MinWidth = 70
        Position = 7
        Width = 120
        WideText = 'Cell'
      end
      item
        ImageIndex = 12
        MinWidth = 70
        Position = 8
        Width = 120
        WideText = 'Fax'
      end
      item
        ImageIndex = 13
        MinWidth = 70
        Position = 9
        Width = 70
        WideText = 'Other'
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 324
    Width = 618
    Height = 39
    Align = alBottom
    BevelOuter = bvLowered
    TabOrder = 0
    Visible = False
    object btnSYNC: TButton
      Left = 156
      Top = 8
      Width = 49
      Height = 21
      Caption = 'SYNC'
      TabOrder = 0
      Visible = False
      OnClick = btnSYNCClick
    end
    object Panel2: TPanel
      Left = 504
      Top = 8
      Width = 105
      Height = 105
      BevelOuter = bvNone
      TabOrder = 1
      Visible = False
    end
    object btnLOG: TButton
      Left = 208
      Top = 8
      Width = 49
      Height = 21
      Caption = 'LOG'
      TabOrder = 2
      Visible = False
      OnClick = btnLOGClick
    end
    object txtCC: TEdit
      Left = 8
      Top = 8
      Width = 33
      Height = 21
      TabOrder = 3
    end
    object txtLUID: TEdit
      Left = 44
      Top = 8
      Width = 105
      Height = 21
      TabOrder = 4
      Text = 'txtLUID'
    end
  end
  object NoItemsPanel: TPanel
    Left = 8
    Top = 24
    Width = 585
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    BevelOuter = bvNone
    Caption =
      'There are no items to display in this view. Did you synchronize ' +
      'phonebook?'
    Color = clWindow
    TabOrder = 2
  end
  object PopupMenu1: TPopupMenu
    Images = Form1.ImageList2
    OnPopup = PopupMenu1Popup
    Left = 92
    Top = 52
    object NewContact1: TMenuItem
      Action = Form1.ActionContactsNewPerson
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object SendMsg1: TMenuItem
      Action = Form1.ActionContactsNewMsg
    end
    object voicecall1: TMenuItem
      Action = Form1.ActionContactsVoiceCall
    end
    object ChatContact1: TMenuItem
      Action = Form1.ActionContactsNewChat
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object ClearChangedFlag1: TMenuItem
      Caption = 'Force as Not Modified...'
      OnClick = ClearChangedFlag1Click
    end
    object ForceUpdate: TMenuItem
      Caption = 'Force as Modified...'
      OnClick = ForceUpdateClick
    end
    object ForceNewContact: TMenuItem
      Caption = 'Force as New Contact (No Undo)...'
      OnClick = ForceNewContactClick
    end
    object UndoLastChange1: TMenuItem
      Caption = '&Undo Edit Last Contact...'
      Enabled = False
      OnClick = UndoLastChange1Click
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object AddtoGroup1: TMenuItem
      AutoHotkeys = maManual
      Caption = 'Add to &Group'
      object TMenuItem
      end
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object DownloadEntirePhonebook1: TMenuItem
      Caption = 'Download Entire Phonebook...'
      ImageIndex = 1
      OnClick = DownloadEntirePhonebook1Click
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Delete1: TMenuItem
      Action = Form1.ActionDelete
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object ImportContacts1: TMenuItem
      Caption = 'Imp&ort Contacts...'
      OnClick = ImportContacts1Click
    end
    object Exportselectedcontacts1: TMenuItem
      Action = Form1.ActionContactsExport
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Properties1: TMenuItem
      Caption = 'P&roperties'
      ImageIndex = 10
      OnClick = btnEditClick
    end
  end
  object FormStorage1: TFormStorage
    IniFileName = 'Software\floAt'
    IniSection = 'ME'
    Options = []
    UseRegistry = True
    OnSavePlacement = FormStorage1SavePlacement
    OnRestorePlacement = FormStorage1RestorePlacement
    StoredProps.Strings = (
      'FirstLast1.Checked'
      'LastFirst1.Checked')
    StoredValues = <
      item
        Name = 'ListHeader'
        Value = ''
      end>
    Left = 20
    Top = 52
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = '.vcf'
    Filter = 'vCard Files (*.vcf)|*.vcf|All Files|*.*'
    Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
    Title = 'Import Contacts...'
    Left = 128
    Top = 52
  end
  object PopupMenu2: TPopupMenu
    Left = 56
    Top = 52
    object FirstLast1: TMenuItem
      Caption = 'First Last'
      Checked = True
      GroupIndex = 1
      RadioItem = True
      OnClick = FirstLast1Click
    end
    object LastFirst1: TMenuItem
      Caption = 'Last First'
      GroupIndex = 1
      RadioItem = True
      OnClick = FirstLast1Click
    end
  end
end